home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / shape.dxr / 00020.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  729 b   |  37 lines
  1. on mouseWithin
  2.   global theselected
  3.   if theselected = 3 then
  4.     sprite(82).visible = 1
  5.   end if
  6. end
  7.  
  8. on mouseEnter
  9.   global theselected
  10.   sprite(77).visible = 0
  11.   if theselected <> 3 then
  12.     sprite(82).visible = 0
  13.   end if
  14. end
  15.  
  16. on mouseLeave
  17.   global theselected
  18.   if theselected = 3 then
  19.     sprite(82).visible = 1
  20.   else
  21.     sprite(77).visible = 1
  22.     sprite(82).visible = 0
  23.   end if
  24. end
  25.  
  26. on mouseUp me
  27.   global thetext, theimage, theselected, thecredit
  28.   set the memberNum of sprite 87 to theimage + 2
  29.   set the memberNum of sprite 86 to thetext + 2
  30.   set the memberNum of sprite 194 to thecredit + 2
  31.   theselected = 3
  32.   repeat with X = 0 to 4
  33.     sprite(75 + X).visible = 1
  34.     sprite(80 + X).visible = 0
  35.   end repeat
  36. end
  37.